home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Developer Essentials / MPW Interfaces & Libraries / AIncludes / CTBUtilities.a < prev    next >
Encoding:
Text File  |  1992-01-29  |  2.1 KB  |  132 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        CTBUtilities.a
  3. ;
  4. ;    Contains:    Assembler interface to the Comm Toolbox Utilities manager
  5. ;
  6. ;
  7. ;    Copyright:    © 1988-1991 by Apple Computer, Inc.
  8. ;                All rights reserved.
  9. ;
  10. ;
  11.     IF (&TYPE('__INCLUDINGCTBUTILITIES__') = 'UNDEFINED') THEN
  12. __INCLUDINGCTBUTILITIES__     SET         1
  13.  
  14.     IF (&TYPE('__IncludingTraps__') = 'UNDEFINED') THEN
  15.     INCLUDE 'Traps.a'
  16.     ENDIF
  17.  
  18.     MACRO
  19.     _CTBCall &selector
  20.     move.w        &selector,-(sp)
  21.     move.l        sp,a0
  22.     _CommToolboxDispatch
  23.     adda.w        #$2,sp                ; Pop the selector back off 
  24.     ENDM
  25.  
  26. ;    version of CommToolbox Utilities
  27. curCTBUVersion        EQU    2
  28.  
  29. ; CTBUErr
  30. ctbuGenericError    EQU    -1
  31. ctbuNoErr            EQU    0
  32.  
  33. ; Choose responses 
  34. chooseDisaster        EQU    -2
  35. chooseFailed        EQU    -1
  36. chooseAborted        EQU    0
  37. chooseOKMinor        EQU    1
  38. chooseOKMajor        EQU    2
  39. chooseCancel        EQU    3
  40.  
  41. ; NuLookup responses 
  42. nlOk            EQU    0
  43. nlCancel        EQU    1
  44. nlEject            EQU    2
  45.  
  46. ; Name FilterProc responses 
  47. nameInclude        EQU    1
  48. nameDisable        EQU    2
  49. nameReject        EQU    3
  50.  
  51. ; Zone FilterProc responses 
  52. zoneInclude        EQU    1
  53. zoneDisable        EQU    2
  54. zoneReject        EQU    3
  55.  
  56. ; Dialog items for hook procedure 
  57. hookOK            EQU    1
  58. hookCancel         EQU    2
  59. hookOutline        EQU    3
  60. hookTitle        EQU    4
  61. hookItemlist    EQU    5
  62. hookZonetitle    EQU    6
  63. hookZonelist    EQU    7
  64. hookLine        EQU    8
  65. hookVersion        EQU    9
  66. hookReserved1    EQU    10
  67. hookReserved2     EQU    11
  68. hookReserved3    EQU    12
  69. hookReserved4    EQU    13
  70.  
  71. ; Virtual items in the dialog item list 
  72. hookNull        EQU    100
  73. hookItemRefresh    EQU    101
  74. hookZoneRefresh    EQU    102
  75. hookEject        EQU    103
  76. hookPreflight    EQU    104
  77. hookPostflight    EQU    105
  78. hookKeyBase        EQU    1000
  79.  
  80. ;    NuLookup data structures
  81. NLTypeEntry        Record 0
  82. hIcon    ds.l    1
  83. ICON    EQU        hIcon   ; for backward compatibility
  84. typeStr    ds.b    34
  85.     EndR
  86.     
  87. NBPReply        Record 0
  88. theEntity     ds.b    102
  89. theAddr        ds.l    1
  90.     EndR
  91.     
  92.     
  93. InitCTBUtilities    EQU $401
  94. CTBGetCTBVersion    EQU    $405
  95. NuLookup            EQU $406
  96. NuPLookup            EQU    $407
  97. StandardNBP            EQU $406
  98. CustomNBP            EQU    $407
  99.     
  100.     MACRO
  101.     _InitCTBUtilities
  102.     _CTBCall    #InitCTBUtilities
  103.     ENDM
  104.     
  105.     MACRO
  106.     _CTBGetCTBVersion
  107.     _CTBCall    #CTBGetCTBVersion
  108.     ENDM
  109.     
  110.     MACRO
  111.     _NuLookup
  112.     _CTBCall    #NuLookup
  113.     ENDM
  114.     
  115.     MACRO
  116.     _NuPLookup
  117.     _CTBCall    #NuPLookup
  118.     ENDM
  119.     
  120.     MACRO
  121.     _StandardNBP
  122.     _CTBCall    #StandardNBP
  123.     ENDM
  124.     
  125.     MACRO
  126.     _CustomNBP
  127.     _CTBCall    #CustomNBP
  128.     ENDM
  129.     
  130.     
  131.     ENDIF         ; already included
  132.